unit ULocalidades_ProveedorUt;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics,
  Controls, Forms, Dialogs, uniGUITypes, uniGUIAbstractClasses,
  uniGUIClasses, uniGUIForm, uniMultiItem, uniComboBox, uniDBComboBox,
  uniRadioButton, uniDBEdit, uniBitBtn, uniBasicGrid, uniDBGrid, uniButton,
  uniEdit, uniRadioGroup, uniLabel, uniDateTimePicker, uniCheckBox, uniPanel,
  uniPageControl, uniGUIBaseClasses, FMTBcd, DBClient, Provider, DB, SqlExpr;

type
  TULocalidadesProveedor = class(TUniForm)
    pgMantenimientoLocal: TUniPageControl;
    TabConsulta: TUniTabSheet;
    pnlBuscar: TUniPanel;
    cbxFecha: TUniCheckBox;
    dbDesdeC: TUniDateTimePicker;
    dbHastaC: TUniDateTimePicker;
    lblDesde: TUniLabel;
    lblHasta: TUniLabel;
    pnlFiltro2: TUniPanel;
    rgEstadoReg: TUniRadioGroup;
    lblCodigo: TUniLabel;
    dbCodigoLocalidad: TUniEdit;
    btnBuscadorP: TUniButton;
    dbDescLocalidad: TUniEdit;
    dbgConsultaProveedores: TUniDBGrid;
    pnlTitulo: TUniPanel;
    lblTitulo: TUniLabel;
    pnlBotonesProv: TUniPanel;
    btnNuevo: TUniBitBtn;
    btnEditar: TUniBitBtn;
    btnEliminar: TUniBitBtn;
    btnCancelar: TUniBitBtn;
    btnBuscarP: TUniBitBtn;
    TabMantenimiento: TUniTabSheet;
    pnlGeneral: TUniPanel;
    pnlCargaDatos: TUniPanel;
    lblTipoLocalidad: TUniLabel;
    lblEmpresa: TUniLabel;
    lblDescLocalidad: TUniLabel;
    dbNombreE: TUniDBEdit;
    upDocumento: TUniPanel;
    rbPais: TUniRadioButton;
    rbCiudad: TUniRadioButton;
    UniLabel5: TUniLabel;
    pnlMantenimiento: TUniPanel;
    lblMantenimientoLocalidades: TUniLabel;
    pnlBotones: TUniPanel;
    btnGuardar: TUniBitBtn;
    btnCancelarCargaProv: TUniBitBtn;
    qryLocalidades: TSQLQuery;
    dsLocalidades: TDataSource;
    provLocalidades: TDataSetProvider;
    cdsLocalidad: TClientDataSet;
    qryLocalidadesID_LOCALIDAD: TIntegerField;
    qryLocalidadesDESCRIPCION: TStringField;
    qryLocalidadesTIPO_LOCALIDAD: TStringField;
    qryLocalidadesESTADO_REGISTRO: TStringField;
    qryLocalidadesOPERADOR: TStringField;
    qryLocalidadesFECHA_CARGA: TDateField;
    cdsLocalidadID_LOCALIDAD: TIntegerField;
    cdsLocalidadDESCRIPCION: TStringField;
    cdsLocalidadTIPO_LOCALIDAD: TStringField;
    cdsLocalidadESTADO_REGISTRO: TStringField;
    cdsLocalidadOPERADOR: TStringField;
    cdsLocalidadFECHA_CARGA: TDateField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

function ULocalidadesProveedor: TULocalidadesProveedor;

implementation

{$R *.dfm}

uses
  MainModule;

function ULocalidadesProveedor: TULocalidadesProveedor;
begin
  Result := TULocalidadesProveedor(UniMainModule.GetFormInstance(TULocalidadesProveedor));
end;

end.
